*************************************************************************************
*																					*
*					ANALYSES APPENDIX												*
*																					*
*************************************************************************************

* Author: 	Andreas Jungherr, Matthias Mader, Harald Schoen, and Alexander Wuttke
* Date: 	Dec 17
* Project: 	Context-Driven Attitude Formation:
*			The Difference Between Supporting Free Trade in the Abstract and Supporting Specific Trade Agreements


//////////////////////////////
*Figure S2-1
*Distribution of the Dependent Variables
//////////////////////////////

twoway (histogram att_ttip_1, bin(7) gap(10) percent color(gs11) fintensity(inten50) xlabel(0 "Oppose" 0.5 "Partly oppose, partly support" 1 "Support")) ///
       (histogram freetrade,  percent bin(7) gap(10) fcolor(none)  ), legend(order(1 "TTIP" 2 "Free trade" )) ///
	   graphregion(margin(zero))


//////////////////////////////
*Table S6-1
*Free Trade Attitude as a Determinant of TTIP Attitudes
//////////////////////////////
		
regress att_ttip_1  	freetrade $specvalues  	$isco 						$values 	$elitecues
estimates store s6
esttab s6 using "s6.rtf", replace ///
		title("Table S6-1: The Effect of Free Trade Attitudes on Attitudes Toward TTIP") ///
		mtitles("TTIP" "Free trade"  "TTIP" "Free trade" "TTIP" "Free trade" ) ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are OLS coefficients with standard errors in parentheses; reference category of PI dummies is “other”/“no party”; reference category of skill level dummies is “all others”; * p<0.05, ** p<0.01, *** p<0.001.") /// 
		varwidth(30) modelwidth(3)
		
	   
//////////////////////////////
*Table S7-1
*Ordered logit on free trade
//////////////////////////////	   

*Modell III, FreeTrade
ologit freetrade  		$specvalues  	$isco 						$values 	$elitecues
estimates store ologit_freetrade_b

esttab	ologit_freetrade_b  using "Table X OLogit freetrade_b.rtf", replace ///
		title("Table X: Ordered logit regression of determints of attitudes towards free trade") ///
		mtitles("b"  ) ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are regression coefficients (b) with standard errors in parentheses and odds ratios; Reference category of PI dummies: other/no party; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(30) modelwidth(3)
		
esttab	ologit_freetrade_b using "Table X OLogit freetrade_or.rtf", replace ///
		title("Table X: Ordered logit regression of determints of attitudes towards free trade") ///
		mtitles("OR"  ) ///
		eform nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are regression coefficients (b) with standard errors in parentheses and odds ratios; Reference category of PI dummies: other/no party; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(30) modelwidth(3)

		

//////////////////////////////
*Table S8-1
*Demographic Weights
//////////////////////////////
	
*Modell III, TTIP
regress att_ttip_1  	$specvalues  	$isco 						$values 	$elitecues
estimates store unweighted

*Modell III, TTIP
regress att_ttip_1  	$specvalues  	$isco 						$values 	$elitecues [pweight=wgt1]
estimates store weighted


esttab unweighted weighted using "weights.rtf", replace ///
		title("Table X:Determinants of TTIP Attitudes") ///
		mtitles("Standard model" "Weighted model") ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: other/no party; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(30) modelwidth(3)
		
coefplot (unweighted, label("Standard model") msymbol(Oh)  offset(-0.2))   (weighted, label("Weighted model")  msymbol(t)  offset(0.3)) , ///
		mcolor(%70) xtitle("") ciopts(recast(rspike) lwidth(thin) color(%70)) msize(medlarge)  xlabel(,labsize(vsmall)) ylabel(,labsize(vsmall)) xline(0, lpattern(shortdash))  ///
		legend(symxsize(*3) symysize(*3) bmargin(zero) ring(0) position(4) region(fcolor(%80))) ///
		headings(isco1_d = `"{it:Economic self-interest}"' freetrade_ego = `"{it:Perceived effects}"' atlanticism = `"{it:Context-related predispositions}"'  culturalism = `"{it:Openness-related predispositions}"'  pid_cdu_csu_d = `"{it:Elite cues}"' ,labsize(vsmall)) ///Headings
		ysize(18) xsize(17) drop(_cons ) mlabgap(*2)  xtitle(TTIP)

*Modell III, FreeTrade
regress freetrade  	$specvalues  	$isco 						$values 	$elitecues
estimates store unweighted_freetrade

*Modell III, FreeTrade
regress freetrade  	$specvalues  	$isco 						$values 	$elitecues [pweight=wgt1]
estimates store weighted_freetrade


esttab unweighted_freetrade weighted_freetrade using "weights_freetrade.rtf", replace ///
		title("Table X:Determinants of Freetrade Attitudes") ///
		mtitles("Standard model" "Weighted model") ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: other/no party; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(30) modelwidth(3)
		
coefplot (unweighted_freetrade , label("Standard model") msymbol(Oh)  offset(-0.2))   (weighted_freetrade, label("Weighted model")  msymbol(t)  offset(0.3)) , ///
		mcolor(%70) xtitle("") ciopts(recast(rspike) lwidth(thin) color(%70)) msize(medlarge)  xlabel(,labsize(vsmall)) ylabel(,labsize(vsmall)) xline(0, lpattern(shortdash))  ///
		legend(symxsize(*3) symysize(*3) bmargin(zero) ring(0) position(7) region(fcolor(%80))) ///
		headings(isco1_d = `"{it:Economic self-interest}"' freetrade_ego = `"{it:Perceived effects}"' atlanticism = `"{it:Context-related predispositions}"'  culturalism = `"{it:Openness-related predispositions}"'  pid_cdu_csu_d = `"{it:Elite cues}"' ,labsize(vsmall)) ///Headings
		ysize(18) xsize(17) drop(_cons ) mlabgap(*2)  xtitle(Freetrade)

//////////////////////////////
*Table S-10
*Univariate Regressions on self-interest
//////////////////////////////
eststo clear
foreach var of varlist  $inc $employees {

foreach depvar of varlist att_ttip_1 freetrade {
	eststo: regress `depvar'	`var'

	}
}

eststo: regress att_ttip_1  $isco
eststo: regress freetrade $isco

esttab 	using "Table_univariate.rtf", replace ///
		title("Table: Comparison of the Determinants of Free Trade and TTIP Attitudes") ///
		mtitles("TTIP" "Free-Trade"  "TTIP" "Free Trade" "TTIP" "Free Trade" ) ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: other/no party; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(30) modelwidth(3)
		
//////////////////////////////
* S10 Income Variabe
//////////////////////////////		


tab inc, gen(inc_cat)
gen inc_cat_mv = cond(missing(inc), 1, 0)

foreach var of varlist inc_cat1 inc_cat2 inc_cat3 inc_cat4 inc_cat5 inc_cat6 inc_cat7 inc_cat8 inc_cat9 inc_cat10 inc_cat11 inc_cat12 inc_cat13{
replace `var' = 0 if inc_cat_mv == 1 
}


eststo clear
eststo: regress att_ttip_1  	inc_low_d inc_medium_d 
eststo: regress freetrade  		inc_low_d inc_medium_d 
eststo: regress att_ttip_1  	inc_medium_d	inc_high_d
eststo: regress freetrade  		inc_medium_d	inc_high_d
eststo: regress att_ttip_1  	inc_medium_d	
eststo: regress freetrade  		inc_medium_d	
eststo: regress att_ttip_1  	ib7.F21_1
eststo: regress freetrade  		ib7.F21_1


esttab  using "s10_income.rtf", replace ///
		title("Table S10-1: The Effect of Free Trade Attitudes on Attitudes Toward TTIP") ///
		mtitles("TTIP" "Free trade"  "TTIP" "Free trade" "TTIP" "Free trade" ) ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are OLS coefficients with standard errors in parentheses; reference category of PI dummies is “other”/“no party”; reference category of skill level dummies is “all others”; * p<0.05, ** p<0.01, *** p<0.001.") /// 
		varwidth(30) modelwidth(3)
		

		
//////////////////////////////
*Supplement 11: Perceived Effects of Free trade
//////////////////////////////		

eststo clear
*Model I, TTIP
regress att_ttip_1  	$utility	$specvalues 	$isco 	$employees	$inc 	$values   	$elitecues	
estimates store m1

*Model I, FreeTrade
regress freetrade  		$utility	$specvalues  	$isco 	$employees	$inc	$values 	$elitecues	
estimates store m2

*Model II, TTIP
regress att_ttip_1  	$utility	$specvalues 	$isco 				$inc	$values   	$elitecues	
estimates store m3
*FreeTrade

*Model II, FreeTrade
regress freetrade  		$utility	$specvalues 	$isco 				$inc 	$values   	$elitecues	
estimates store m4
		
*Modell III, TTIP: Standard model
regress att_ttip_1  	$utility	$specvalues  	$isco 						$values 	$elitecues	
estimates store m7

*Modell III, FreeTrade: Standard model
regress freetrade  		$utility	$specvalues  	$isco 						$values 	$elitecues	
estimates store m8


esttab m1 m2 m3 m4 m7 m8 using "utility.rtf", replace ///
		title("Table S13-1: Regressions of Free trade and TTIP Attitudes on Perceived Effects of Trade") ///
		mtitles("TTIP" "Free trade"  "TTIP" "Free trade" "TTIP" "Free trade" ) ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are OLS coefficients with standard errors in parentheses; reference category of PI dummies is 'other'/'no party'; reference category of skill level dummies is 'all others'; * p<0.05, ** p<0.01, *** p<0.001.") /// 
		varwidth(30) modelwidth(3)

		
//////////////////////////////
* S 12  SUBGROUP ANALYSES
* INTERACTIONS
//////////////////////////////		
		
{
		
		
		
		
		
		
//////////////////////////////
*Table Interaction Involvement
//////////////////////////////

{

//////////////////////////////
*TTIP
//////////////////////////////



eststo clear
*TTIP
*Model I
eststo:  regress att_ttip_1  	$standardmodel if polint_d == 0
 
*TTIP
*Model I
eststo:  regress att_ttip_1  	$standardmodel if polint_d == 1

//////////////////////////////
*Freetrade
//////////////////////////////


*FreeTrade
*Model I
eststo:  regress freetrade  	$standardmodel  if polint_d == 0

*FreeTrade
*Model I
eststo:  regress freetrade  	$standardmodel  if polint_d == 1



coefplot (est1, label("Low") msymbol(Oh)  offset(-0.2))  (est2, label("High")  msymbol(T)  offset(0.2)) , bylabel (TTIP)  || (est3, label("Low") msymbol(Oh)  offset(-0.2))  (est4, label("High")  msymbol(T)  offset(0.2))  , bylabel (Free Trade) ||, ///
		mcolor(%60) xtitle("") ciopts(recast(rspike) lwidth(thin) color(%70)) msize(medlarge)  xlabel(,labsize(vsmall)) ylabel(,labsize(vsmall)) xline(0, lpattern(shortdash))  ///
		legend(symxsize(*3) symysize(*3) bmargin(zero) ring(0) position(5) region(fcolor(%80)))  ///
		headings(isco1_d = `"{it:Economic self-interest}"' freetrade_ego = `"{it:Perceived effects}"' atlanticism = `"{it:Predispositions not directly related to trade}"'  culturalism = `"{it:Openness-related predispositions}"'  pid_cdu_csu_d = `"{it:Elite cues}"' ,labsize(vsmall)) ///Headings
		ysize(15) xsize(17) drop(_cons ) mlabgap(*2) byopts(graphregion(margin(small)))


esttab using "involvement.rtf", replace ///
		title("Determinants of Attitudes towards" "TTIP and Free Trade, by Political Involvement") ///
		mtitles("TTIP: Low" "TTIP: High" "Free Trade: Low" "Free Trade: High") ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: 'other'/'no party'; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(20) modelwidth(3)
		


		
//////////////////////////////
* Interaction Education
//////////////////////////////

{



eststo clear
**TTIP: Edu Low
eststo:  regress att_ttip_1  	$standardmodel	if 	edu_low_d == 1
 
**TTIP:  Edu Middle

eststo:  regress att_ttip_1  	$standardmodel	if 	edu_medium_d == 1

**TTIP: Edu High
eststo:  regress att_ttip_1  	$standardmodel	if 	edu_high_d == 1

//////////////////////////////
*Freetrade
//////////////////////////////


*FreeTrade
**FreeTrade: Edu Low
eststo:  regress freetrade  	$standardmodel	if 	edu_low_d == 1
 
**FreeTrade:  Edu Middle

eststo:  regress freetrade  	$standardmodel	if 	edu_medium_d == 1

**FreeTrade: Edu High
eststo:  regress freetrade  	$standardmodel	if 	edu_high_d == 1




coefplot 	(est1, label("Edu: Low") msymbol(Oh)  offset(-0.2))  (est2, label("Edu: Middle")  msymbol(T)  offset(0.2))	(est3, label("Edu: High")  msymbol(Sh)  offset(0.2) mcolor(gs13) ciopts(color(gs13))) , bylabel (TTIP)  ///
		|| 	(est4, label("Edu: Low") msymbol(Oh)  offset(-0.2))  (est5, label("Edu: Middle")  msymbol(T)  offset(0.2))	(est6, label("Edu: High")  msymbol(Sh)  offset(0.2) mcolor(gs13) ciopts(color(gs13))) , bylabel (Free Trade) ||, ///
		mcolor(%60) xtitle("") ciopts(recast(rspike) lwidth(thin) color(%70)) msize(medlarge)  xlabel(,labsize(vsmall)) ylabel(,labsize(vsmall)) xline(0, lpattern(shortdash))  ///
		legend(symxsize(*3) symysize(*3) bmargin(zero) ring(0) position(5) region(fcolor(%80)))  ///
		headings(isco1_d = `"{it:Economic self-interest}"' freetrade_ego = `"{it:Perceived effects}"' atlanticism = `"{it:Predispositions not directly related to trade}"'  culturalism = `"{it:Openness-related predispositions}"'  pid_cdu_csu_d = `"{it:Elite cues}"' ,labsize(vsmall)) ///Headings
		ysize(15) xsize(17) drop(_cons ) mlabgap(*2) byopts(graphregion(margin(small)))


esttab using "education.rtf", replace ///
		title("Determinants of Attitudes towards" "TTIP and Free Trade, by formal education") ///
		mtitles("TTIP: Education Low" "TTIP: Education Middle" "TTIP: Education High" "Free Trade: Education Low"  "Free Trade: Education Middle" "Free Trade: Education High") ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: 'other'/'no party'; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(20) modelwidth(3)
		


}




//////////////////////////////
* Interaction Sensitivity: TTIP Importance
//////////////////////////////

{

eststo clear
*TTIP
*Model I
eststo:  regress att_ttip_1  	$standardmodel if ttip_imp_pers_d_1 == 0
 
*TTIP
*Model I
eststo:  regress att_ttip_1  	$standardmodel if ttip_imp_pers_d_1 == 1


*Freetrade



*FreeTrade
*Model I
eststo:  regress freetrade  	$standardmodel  if ttip_imp_pers_d_1 == 0

*FreeTrade
*Model I
eststo:  regress freetrade  	$standardmodel  if ttip_imp_pers_d_1 == 1




coefplot (est1, label("Low") msymbol(Oh)  offset(-0.2))  (est2, label("High")  msymbol(T)  offset(0.2)) , bylabel (TTIP)  || (est3, label("TTIP Importance: Low") msymbol(Oh)  offset(-0.2))  (est4, label("TTIP Importance: High")  msymbol(T)  offset(0.2))  , bylabel (Free Trade) ||, ///
		mcolor(%70) xtitle("") ciopts(recast(rspike) lwidth(thin) color(%70)) msize(medlarge)  xlabel(,labsize(vsmall)) ylabel(,labsize(vsmall)) xline(0, lpattern(shortdash))  ///
		legend(symxsize(*3) symysize(*3) bmargin(zero) ring(0) position(5) region(fcolor(%80)))  ///
		headings(isco1_d = `"{it:Economic self-interest}"' freetrade_ego = `"{it:Perceived effects}"' atlanticism = `"{it:Predispositions not directly related to trade}"'  culturalism = `"{it:Openness-related predispositions}"'  pid_cdu_csu_d = `"{it:Elite cues}"' ,labsize(vsmall)) ///Headings
		ysize(15) xsize(17) drop(_cons ) mlabgap(*2) byopts(graphregion(margin(small)))


esttab est1 est3 est2 est4 using "importance_pers.rtf", replace ///
		title("Determinants of Attitudes towards" "TTIP and Free Trade, by Personal Importance") ///
		mtitles("TTIP: Low" "Free Trade: Low"  "TTIP: High" "Free Trade: High") ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: 'other'/'no party'; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(20) modelwidth(3)
		
		
}


//////////////////////////////
* Interaction TTIP Political Importance
//////////////////////////////

{
//////////////////////////////
*TTIP
//////////////////////////////



eststo clear
*TTIP
*Model I
eststo:  regress att_ttip_1  	$standardmodel if ttip_imp_pol_d_1 == 0
 
*TTIP
*Model I
eststo:  regress att_ttip_1  	$standardmodel if ttip_imp_pol_d_1 == 1


*Freetrade



*FreeTrade
*Model I
eststo:  regress freetrade  	$standardmodel  if ttip_imp_pol_d_1 == 0

*FreeTrade
*Model I
eststo:  regress freetrade  	$standardmodel  if ttip_imp_pol_d_1 == 1



coefplot (est1, label("Low") msymbol(Oh)  offset(-0.2))  (est2, label("High")  msymbol(T)  offset(0.2)) , bylabel (TTIP)  || (est3, label("Low") msymbol(Oh)  offset(-0.2))  (est4, label("High")  msymbol(T)  offset(0.2))  , bylabel (Free Trade) ||, ///
		mcolor(%70) xtitle("") ciopts(recast(rspike) lwidth(thin) color(%70)) msize(medlarge)  xlabel(,labsize(vsmall)) ylabel(,labsize(vsmall)) xline(0, lpattern(shortdash))  ///
		legend(symxsize(*3) symysize(*3) bmargin(zero) ring(0) position(5) region(fcolor(%80)))  ///
		headings(isco1_d = `"{it:Economic self-interest}"' freetrade_ego = `"{it:Perceived effects}"' atlanticism = `"{it:Predispositions not directly related to trade}"'  culturalism = `"{it:Openness-related predispositions}"'  pid_cdu_csu_d = `"{it:Elite cues}"' ,labsize(vsmall)) ///Headings
		ysize(15) xsize(17) drop(_cons ) mlabgap(*2) byopts(graphregion(margin(small)))


esttab est1 est3 est2 est4 using "pol_importance.rtf", replace ///
		title("Determinants of Attitudes towards" "TTIP and Free Trade, by Perceived Importance of TTIP for Germany") ///
		mtitles("TTIP: Low" "Free Trade: Low"  "TTIP: High" "Free Trade: High") ///
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: 'other'/'no party'; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(20) modelwidth(3)
		
		



}
}
}



////////////////////////////////////////////////////////////
* F U R T H E R 	A N A L Y S E S 					*
////////////////////////////////////////////////////////////




//////////////////////////////
*Table
*Mediation
//////////////////////////////	


eststo clear
eststo: regress freetrade_soc $isco 
eststo: regress freetrade_soc $isco $inc 
eststo: regress freetrade_soc $isco $inc $employees 
gen sample_mediation = e(sample)

eststo: regress freetrade_ego $isco 
eststo: regress freetrade_ego $isco $inc 
eststo: regress freetrade_ego $isco $inc $employees
		

esttab using "mediation.rtf", replace ///
		title("Table X:Determinants of Socio- and egotropic Attitudes") ///
		mtitles("Sociotropic" "Sociotropic" "Sociotropic"  "Egotropic"  "Egotropic" "Egotropic") /// 
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: other/no party; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(30) modelwidth(3)
			
eststo clear
eststo: regress freetrade_soc $isco  					if  sample_mediation == 1
eststo: regress freetrade_soc $isco $inc 				if  sample_mediation == 1
eststo: regress freetrade_soc $isco $inc $employees		if  sample_mediation == 1

eststo: regress freetrade_ego $isco 					if  sample_mediation == 1
eststo: regress freetrade_ego $isco $inc 				if  sample_mediation == 1
eststo: regress freetrade_ego $isco $inc $employees		if  sample_mediation == 1
		

esttab using "mediation_sample.rtf", replace ///
		title("Table X:Determinants of Socio- and egotropic Attitudes fixed sample") ///
		mtitles("Sociotropic" "Sociotropic" "Sociotropic"  "Egotropic"  "Egotropic" "Egotropic") /// 
		nonum nogaps obslast par label ///
		b(2) se(2) ar2(3) nonotes align(l) ///
		addnotes("Notes: Reported are linear regression coefficients with standard errors in parentheses; Reference category of PI dummies: other/no party; Reference category of skill level dummies: all others; categorical income variable trichotomized; *: p<0,05, **: p<0,01, ***: p<0,001.") /// 
		varwidth(30) modelwidth(3)
					
*Model I, TTIP
regress att_ttip_1  	$specvalues 	$isco 	$employees	$inc 	$values   	$elitecues 
estimates store m1

*Model I, FreeTrade
regress freetrade  		$specvalues  	$isco 	$employees	$inc	$values 	$elitecues
estimates store m2

*Model II, TTIP
regress att_ttip_1  	$specvalues 	$isco 				$inc	$values   	$elitecues
estimates store m3
*FreeTrade

*Model II, FreeTrade
regress freetrade  		$specvalues 	$isco 				$inc 	$values   	$elitecues
estimates store m4
		
*Modell III, TTIP
regress att_ttip_1  	$specvalues  	$isco 						$values 	$elitecues
estimates store m7

*Modell III, FreeTrade
regress freetrade  		$specvalues  	$isco 						$values 	$elitecues


		